home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1995 #5 & #6 / Amiga Plus CD - 1995 - No. 5 and 6.iso / pd / serien / purity / nr.20 / gadunit / anleitung next >
Text File  |  1995-04-22  |  3KB  |  82 lines
  1.  
  2.  
  3.  
  4.    Anleitung zu den beiden neuen Units gadbou1 und rogergads1:
  5.    ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
  6.  
  7. Diese beiden Units sollen die Programmierung von dreidimensionalen
  8. Gadgets vereinfachen, sodaß man mit geringem Aufwand einige der
  9. neuen Gadgets von OS2 in eigenen Programmen verwenden kann.
  10.  
  11. Zuerst einmal eine Übersicht über die Prozeduren, die uns diese
  12. beiden neuen Units zur Verfügung stellen.
  13.  
  14. Prozeduren, die die Unit gadbou1 zur Verfügung stellt:
  15.  
  16. PROCEDURE umrandung(wo:p_window,c1,c2,x,y,b,h:INTEGER);
  17. PROCEDURE gbord(wo:p_window,was:p_gadget);
  18. PROCEDURE zeichnetext(c1,c2:SHORT,wo:p_window,x,y:INTEGER,text:strtyp);
  19. PROCEDURE uline(wo:p_window,was:p_gadget,c:CHAR);
  20. PROCEDURE gbu(wo:p_window,was:p_gadget,c:CHAR);
  21. PROCEDURE stringumrandung(wo:p_window,c1,c2,x,y,b,h:WORD);
  22.  
  23. Ich glaube, diese müßten inzwischen allgemein bekannt sein. Ansonsten
  24. verweise ich auf die vorhergehenden Puritys, die eigentlich jeder in
  25. seiner PD-Sammlung haben müßte.
  26.  
  27.  
  28. Rogergads1 beinhaltet nur eine Prozedur:
  29.  
  30. PROCEDURE free_image_mem;
  31.  
  32. Die Aufgabe dieser Prozedur ist es den Speicher, den die Bilder der
  33. neuen Gadgets belegen am Programmende wieder freizugeben.
  34. In Rogergads1 sind dafür einige wichtige Variablen enthalten:
  35.  
  36. VAR check1,check2,radio1,radio2,cycle1:Image;
  37.  
  38. Diese muß man dann im eigenen Programm bei den Gadgets ins Gadgetrender
  39. bzw. bei dem radiobuttongadget und dem checkboxgadget auch noch ins
  40. Selectrender-feld eintragen. Wie das aussehen soll, könnt Ihr im
  41. Programm Tester sehen.
  42.  
  43. Hier nochmal die passenden images und die dazugehörigen gadgets:
  44.  
  45.                                  |    gadgetrender    |  selectrender  |
  46.   -------------------------------+--------------------+----------------+
  47.   checkboxgadget                 |       check1       |      check2    |
  48.   -------------------------------+--------------------+----------------+
  49.   radiobuttongadget              |       radio1       |     radio2     |
  50.   -------------------------------+--------------------+----------------+
  51.   cyclegadget                    |       cycle1       |       NIL      |
  52.   -------------------------------+--------------------+----------------+
  53.  
  54. Außerdem müßt Ihr noch die Prozedur gbord aus der Unit gadbou1 aufrufen.
  55. Gadbou1 wird übrigens automatisch mit Rogergads geladen. Wen es interes-
  56. siert, der kann sich ja mal den Unitquellkot (eklig) anschauen.
  57.  
  58. So, jetzt kanns losgehen, wenn Ihr noch Fragen habt, dann könnt Ihr
  59. mir schreiben:
  60.                          Rogersoft
  61.                          Michael Klein
  62.                          Am Wasserturm 6
  63.                          67346 Speyer
  64.  
  65.  
  66. Greetings are going to:
  67.                           Robert Martignoni
  68.                            Falk Zühlsdorff
  69.                             Thomas Peifer
  70.                             Björn Schotte
  71.                           Cengiz  Karabeyaz
  72.                              Daniel Amor
  73.  
  74.  
  75.  Special Greetings to:  Nils, Köddel, Joanna, Katja, Mareike, Gunnar,
  76.     Angela, die anderen Namen weiß ich nicht mehr. Ihr wißt ja, mit
  77.     Namen ...   Hope to see you next Year again in Silz . . .
  78.     Da koch ich Euch auch die heiß ersehnte Soljanka !
  79.  
  80.  
  81. Ende . . .
  82.